home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD ROM Paradise Collection 4
/
CD ROM Paradise Collection 4 1995 Nov.iso
/
science
/
sm32a.zip
/
LIBRARY
/
IM.LI
< prev
next >
Wrap
Text File
|
1993-12-25
|
92b
|
4 lines
im(a_+b_) := im(a)+im(b)
im(a_*b_) := im(a)*re(b)+re(a)*im(b)
im(x_) := if(isreal(x), 0)